object frmMain: TfrmMain
  Left = 248
  Top = 120
  BorderIcons = []
  BorderStyle = bsNone
  ClientHeight = 53
  ClientWidth = 104
  Color = clFuchsia
  TransparentColor = True
  TransparentColorValue = clFuchsia
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'Arial'
  Font.Style = [fsBold]
  OldCreateOrder = False
  PopupMenu = PopMenu
  Scaled = False
  ShowHint = True
  OnCreate = FormCreate
  OnDblClick = FormDblClick
  OnDestroy = FormDestroy
  OnMouseDown = FormMouseDown
  OnMouseMove = FormMouseMove
  OnPaint = FormPaint
  OnResize = FormResize
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 16
  object pnlDate: TPanel
    Left = 2
    Top = 2
    Width = 69
    Height = 16
    BevelOuter = bvNone
    Color = clWindow
    TabOrder = 0
    Visible = False
    object updDate: TUpDown
      Left = 0
      Top = 0
      Width = 28
      Height = 16
      AlignButton = udLeft
      ArrowKeys = False
      Min = -32768
      Max = 32767
      Orientation = udHorizontal
      Position = 0
      TabOrder = 0
      Thousands = False
      Wrap = True
      OnClick = updDateClick
    end
    object edtDate: TEdit
      Left = 32
      Top = 0
      Width = 17
      Height = 16
      BevelEdges = []
      BevelInner = bvNone
      BevelOuter = bvNone
      BorderStyle = bsNone
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = []
      HideSelection = False
      ParentFont = False
      TabOrder = 1
      OnKeyUp = edtDateKeyUp
    end
    object btnDate: TButton
      Left = 53
      Top = 0
      Width = 16
      Height = 16
      Caption = '...'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 2
      OnClick = btnDateClick
      OnKeyUp = edtDateKeyUp
    end
  end
  object PopMenu: TPopupMenu
    OnPopup = PopMenuPopup
    Top = 24
    object PopMenu_ShowHide: TMenuItem
      Caption = 'Display/Hide'
      Default = True
      OnClick = PopMenu_ShowHideClick
    end
    object PopMenu_N1: TMenuItem
      Caption = '-'
    end
    object PopMenu_Memo: TMenuItem
      Caption = 'Add a memo...'
      OnClick = PopMenu_MemoClick
    end
    object PopMenu_Month: TMenuItem
      Caption = 'Go to month...'
      OnClick = PopMenu_MonthClick
    end
    object PopMenu_Config: TMenuItem
      Caption = 'Configure...'
      OnClick = PopMenu_ConfigClick
    end
    object PopMenu_Update: TMenuItem
      Caption = 'Look for updates'
      OnClick = PopMenu_UpdateClick
    end
    object PopMenu_N2: TMenuItem
      Caption = '-'
    end
    object PopMenu_Exit: TMenuItem
      Caption = 'Close'
      OnClick = PopMenu_ExitClick
    end
  end
  object Timer: TTimer
    OnTimer = TimerTimer
    Left = 32
    Top = 24
  end
end